-- card: 2974 from stack: in.3 (US)
-- bmap block id: 3163
-- flags: 0000
-- background id: 2618
-- name: 


-- part 1 (field)
-- low flags: 01
-- high flags: 0007
-- rect: left=69 top=68 right=252 bottom=434
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: Text


-- part 2 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=174 top=281 right=311 bottom=343
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: XRef
----- HyperTalk script -----
on mouseUp
  answer "List what :" with "Handler" or "Variables" or "Xternals"
  put it into ListWhat
  answer "List all :" with "Annuler" or "False" or "True"
  if it is "Annuler" then exit mouseUp
  put it into ListAll
  answer "List numbers :" with "Annuler" or "False" or "True"
  if it is "Annuler" then exit mouseUp
  put it into ListNb

  set cursor to watch
  put XRef(script of this stack,ListWhat,ListAll,ListNb) into cd fld 2
  show cd fld 2
end mouseUp



-- part 3 (field)
-- low flags: 81
-- high flags: 0007
-- rect: left=69 top=68 right=252 bottom=434
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 
----- HyperTalk script -----
on mouseUp
  hide me
  put empty into me
end mouseUp


-- part contents for card part 1
----- text -----


                                                  XRef 1.3

                                          by Frédéric RINALDI


DESCRIPTION
------------
  XRef is a tool for cross-referencing handlers, variables and externals in an HC script.


SYNTAX
--------
                  XRef(<script>[,<H[andlers]|V[ariables]|X[ternals]>
                          [,<ListAll>[,<ListNb>]]])


PARAMETERS
------------
   <script> is the script text to explore

   <H[andlers]|V[ariables]|X[ternals]> defines the desired X-Ref mode: by handlers, by variables or by externals.

   <ListAll> is a boolean. When TRUE, all subitems are listed for each found entry. Default is FALSE.

   <ListNb> is a boolean, used only if <ListAll> = TRUE. When TRUE, all line numbers are listed along with each subitem. Default is FALSE.

   Using "!", "?" and "=" as first parameter will return an online help (resp. copyright,  syntax and output).


USING
-----
   The XFCN returns a list of found entries, depending of the choosen X-Ref mode. Each entry is followed by its type, which can be [HN] (handler), [LV] (local variable, [GV] (global variable), [XC] (external command) or [XF] (external function).

   Mode=H, ListAll=FALSE, ListNb=FALSE
   <handler 1>
   …
   <handler N>

   Mode=H, ListAll=TRUE, ListNb=FALSE
   <handler 1>
   <var/xter 1>[…,<var/xter N>]

   …
   <handler N>
   <var/xter 1>[…,<var/xter N>]

   Mode=H, ListAll=TRUE, ListNb=TRUE
   <handler 1>
   <var/xter 1>: <line 1>[,<line N>]
   …
   <var/xter N>: <line 1>[,<line N>]

   …
   <handler N>
   <var/xter 1>: <line 1>[,<line N>]
   …
   <var/xter N>: <line 1>[,<line N>]


   Mode=V, ListAll=FALSE, ListNb=FALSE
   <variable 1>
   …
   <variable N>

   Mode=V, ListAll=TRUE, ListNb=FALSE
   <variable 1>
   <handler 1>[…,<handler N>]

   …
   <variable N>
   <handler 1>[…,<handler N>]

   Mode=V, ListAll=TRUE, ListNb=TRUE
   <variable 1>
   <handler 1>: <line 1>[,<line N>]
   …
   <handler N>: <line 1>[,<line N>]

   …
   <variable N>
   <handler 1>: <line 1>[,<line N>]
   …
   <handler N>: <line 1>[,<line N>]


   Mode=X, ListAll=FALSE, ListNb=FALSE
   <external 1>
   …
   <external N>

   Mode=X, ListAll=TRUE, ListNb=FALSE
   <external 1>
   <handler 1>[…,<handler N>]

   …
   <external N>
   <handler 1>[…,<handler N>]

   Mode=X, ListAll=TRUE, ListNb=TRUE
   <external 1>
   <handler 1>: <line 1>[,<line N>]
   …
   <handler N>: <line 1>[,<line N>]

   …
   <external N>
   <handler 1>: <line 1>[,<line N>]
   …
   <handler N>: <line 1>[,<line N>]


ERRORS
-------
If an error occurs, XRef can return :
     "Error : Out of memory"
     "Error : Missing or empty script parameter"
     "Error : Second param must begin with [H,V,X]"
     "Error : Third param must be boolean"
     "Error : Fourth param must be boolean"
     "Error : Couldn't get WTLK resource"

HISTORY
--------
1.3 :                                                                                          07/20/92
• Fixed WTLK access for HC 1.2
• Fixed empty string result

1.2 :                                                                                          03/23/92
• First release
--------------------------------------------------------------------
   All externals included in this stack are FreeWare and may be used in non-commercial software provided the following notice is visibly present :

                   XRef XCMD © Frederic Rinaldi, 1990…1992.
 
   Free for non-commercial use. Use in commercial software subjected to prior acknowledgement and licensing from the author, reachable at the following network addresses:

AppleLink: RINALDI1   CalvaCom : FR10    Compuserve : 71170,2111